Top 10k strings from Video Spectrum - Issue 11 (1985)(Video Spectrum)(es)(Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   4 D$(ORD,W,2
   4 D$(ORD,W,1
   4 ;"______________________________"
   4 ;"Revista de Software"
   4 ;"EXTRA VERANO"
   4 ;"          "
   3 H$=R$(H)+R$(H+1
   3 D$(ORD,W)="66"
   3 ;"VIDEOSPECTRUM"
   3 ;"Tfno. (91) 259 31 08"
   3 ;"C/San Telmo 24 - 28016 MADRID"
   2 p$="gano:"+
   2 p$="Pulsa una tecla para continuar":
   2 iz=d$(ord,w,2
   2 iz=d$(ord,w,1
   2 de=d$(ord,w,2
   2 de=d$(ord,w,1
   2 d$(ord,w,2
   2 d$(ord,w,1
   2 d$(ord,w)="66":
   2 Q$=Q$+D$(ORD,W)
   2 MONEDAS=10
   2 A1,B1;" ";
   2 ;"VIDEOSPECTRUM":
   2 ;"SUSCRIBASE TELEFONICAMENTE":
   2 ;"DATO INCORRECTO":
   2 ;"CONCURSO":
   2 ;"C/ San Telmo 24 - 28016 MADRID"
   2 ;"4)Envielo a: VIDEOSPECTRUM"
   2 ;"3)Si es elegido ganara 5000 pts"
   2 ;"2)Mandenoslo en un cassette"
   2 ;"1)Realice un programa original"
   2 ;"**********"
   2 2 PINTAR FICHAS
   1 w$=m$+" "+
   1 w$=j$+" "+
   1 w$=i$+" "+
   1 ver si juego termino
   1 pr+" pts.  ":
   1 poner ficha en mesa sitio elegido
   1 p$="sacar una bola pulsa 'ENTER'":
   1 p$="cartones en pantalla? (s/n)":
   1 p$="carton sera:":
   1 p$="Recaudacion:"+
   1 p$="Quieres que represente los":
   1 p$="Quieres jugar otra partida?(s/n)":
   1 p$="Quieres cambiar el precio (s/n)?":
   1 p$="Pulsa la opcion":
   1 p$="Premios:":
   1 p$="Precio:"+
   1 p$="Para la cinta":
   1 p$="LINEA:"+
   1 p$="Extraccion:":
   1 p$="Esta vez el precio del":
   1 p$="Cuantos cartones vendidos?":
   1 p$="Cartones vendidos:"+
   1 p$="Carton "+
   1 p$="Cada vez que quieras":
   1 p$="BINGO:"+
   1 p$="BINGO":
   1 p$="2-Automatica":
   1 p$="1-Manual":
   1 p$="*"+l$:
   1 p$="*"+b$:
   1 p$="   Que precio?                  ":
   1 p$="                              ":
   1 o=o1+o2+o3+o4:
   1 no cerrado
   1 m$="P")+(2
   1 lin+" pts.":
   1 lin+" pts":
   1 juego cerrado?
   1 juego cerrado
   1 j$="P")+(2
   1 iz=d$(ord,l,2
   1 iz=d$(ord,l,1
   1 iz ahorcado
   1 i$="N")+(2
   1 h$=d$(ord,w,2
   1 h$=d$(ord,w):
   1 h$=d$(ord,w)
   1 domino    >
   1 de=d$(ord,l,2
   1 de=d$(ord,l,1
   1 d$(ord,w)="66"
   1 d$(i,w)=c$(w+s)
   1 colocar h$ en k$
   1 c1,c2;" ";
   1 bingo     ,
   1 bin+" pts.":
   1 bin+" pts":
   1 b$="59:<59:<59:<959799759<<:99:<9575"
   1 a-    ros en este tiempo de vacacio-  nes. Todos son juegos de sobre  mesa, para que, junto a vues-   tros amigos y familiares, pa-   seis unos momentos agradables   y divertidos.                       Deseando haber cumplido el  objetivo para el cual se ha     creado este 'Extra Verano' os   deseamos unas felices vacacio-  nes a todos vosotros."
   1 a$=a$+" ":
   1 a$="2228222822244448222844282224444:"
   1 __________
   1 ZX Fruits 
   1 VER SI PUEDO PONERLA
   1 SUMARIO   s
   1 SUMARIO                     EDITORIAL                   DOMINO                      FRUIT                       BINGO                       RULETA                      MASTERMIND                  4 EN RAYA                   BALONCESTO                  BARCOS                      BOIRA                       PUZZLE                                                                                                                                                                                                                                                      n
   1 S$(H)=S$(H+1
   1 RULETA    
   1 RET H$ DER
   1 RET CON H$
   1 R$(H)=R$(H+1
   1 Q$(H)=Q$(H+1
   1 PRINT VARIABLES
   1 PRESENTACION
   1 PRECIO DEL CARTON
   1 MONEDAS=MONEDAS-1
   1 MONEDAS=MONEDAS+5
   1 MONEDAS=MONEDAS+20
   1 MONEDAS=MONEDAS+15
   1 MONEDAS=MONEDAS+10
   1 MONEDAS=MONEDAS+1
   1 K$(W)=K$(W+1
   1 JUGADORES CONTRARIOS
   1 IZ=D$(ORD,W,2
   1 IZ=D$(ORD,W,1
   1 I5;"          ":
   1 I1+SIZ>D1+SDE
   1 I1+SIZ<D1+SDE
   1 H$=S$(H)+S$(H+1
   1 H$=D$(ORD,W,2
   1 H$=D$(ORD,W)
   1 GUARDA POSIBLES JUGADAS
   1 GRAB/CARGA
   1 Fruits    
   1 FICH      8
   1 ESTADO DE LAS FICHAS
   1 EDITORIAL Z
   1 DOMINO    
   1 DEFINE SIZ-SDE
   1 DE=D$(ORD,W,2
   1 DE=D$(ORD,W,1
   1 D$(ORD,W)=H$
   1 D$(I,W)=H$
   1 COLOCA S$ Y R$
   1 COEDI S.A.
   1 BINGO     
   1 AUMENTO DEL TAMANO DE LAS LETRAS
   1 ASIGNACION DE PREMIOS
   1 AR=D$(ORD,W,2
   1 AR=D$(ORD,W,1
   1 ACION DEL CARTON
   1 A2,B2;B$(T+1
   1 A2,B2;B$(1
   1 A1,B1;B$(Z+1
   1 A1,B1;B$(1
   1 ;;"GRABANDO ";
   1 ;,,">>> PONGA EN MARCHA EL CASSETTE",,,,,
   1 ;"sacadas:";
   1 ;"anterior";
   1 ;"______________________________":
   1 ;"Trav. de Gracia 62 - BARCELONA"
   1 ;"Tfnos.2593108 2593106"
   1 ;"Tfno. (93) 209 39 22":
   1 ;"Tfno 2592103 2593006  2593108 "
   1 ;"TENGO TANTAS QUE NO SE....?"
   1 ;"TE VAS HA ENTERAR........":
   1 ;"TE HAS QUEDADO SIN DINERO       ";
   1 ;"SIGNO Impresores"
   1 ;"Revista de Software":
   1 ;"REDACCION Y SUSCRIPCIONES:"
   1 ;"R E V I S T A";
   1 ;"Quieres jugar otra vez ?";
   1 ;"Queridos amigos:                                                    Esta cassette del 'Extra    Verano', pretende, acompa
   1 ;"Pulsa una tecla para empezar"
   1 ;"PULSE UNA TECLA PARA CONTINUAR";
   1 ;"PULSA ""P"" PARA VER EL TABLERO"
   1 ;"PUBLICIDAD:"
   1 ;"PUBLICIDAD BARCELONA:"
   1 ;"PROGRAMAS                        ":
   1 ;"PASA-FALTA";
   1 ;"PAR IMPAR"
   1 ;"ORDENADOR"
   1 ;"NOSOTROS";
   1 ;"NO SE DONDE COLOCARLA  ?":
   1 ;"NO SE CUAL PONER"
   1 ;"NO ME QUEDA OTRO REMEDIO..."
   1 ;"Mari Carmen del Toro"
   1 ;"MOVIENDO FICHAS"
   1 ;"MONEDAS";
   1 ;"MARQUE LAS FICHAS EN ORDEN"'"  SI TIENE ALGUN MICRODRIVER NO   FUNCIONARA,DESCONEZTELO"'"      !!BUENA SUERTE..!!"
   1 ;"LA RULETA";
   1 ;"L A   R U L E T A";
   1 ;"Jose Luis Diez"
   1 ;"Javier del Bosque     "
   1 ;"JUGADOR N. ";I
   1 ;"INTRODUCIR MONEDA PULSANDO SPACE"
   1 ;"INSTRUCCIONES";
   1 ;"IMPRIME:"
   1 ;"IMPOSIBLE!":
   1 ;"IGUALES";
   1 ;"IBERFORM"
   1 ;"GRANDES PREMIOS"
   1 ;"GANA EL JUGADOR N. ";ORD
   1 ;"Francisco Valades Galindo"
   1 ;"FRUTAS";
   1 ;"FABRICADO POR:"
   1 ;"EXTRA VERANO":
   1 ;"ESTAMOS EMPATADOS"
   1 ;"EL DOMINO SE ESTA CARGANDO";
   1 ;"EDITA: GEASA"
   1 ;"DISTRIBUYE:"
   1 ;"DIRECTOR:"
   1 ;"DATO INCORRECTO"
   1 ;"D E   S O F T W A R E"
   1 ;"COMPOSICION:"
   1 ;"COEDI,S.A."
   1 ;"C/Albasanz, 27  - 28037 MADRID"
   1 ;"ASI QUE GANAMOS NOSOTROS"
   1 ;"ASI QUE GANA EL ORDENADOR"
   1 ;"APUESTA";
   1 ;"ADMINISTRACION:"
   1 ;"-EL RESTO PAGA EL DOBLE";
   1 ;"-ACERTAR EL NUMERO PAGA 10       VECES LO APOSTADO";
   1 ;"---SUMARIO---";
   1 ;"---EDITORIAL---";
   1 ;"***SUMARIO***":
   1 ;"* Si tienes linea pulsa ""l""";
   1 ;"* Si tienes bingo pulsa ""b""";
   1 ;"* Si durante la partida quieres   hacer una pausa PULSA ""p""";
   1 ;"* Pulsa s si quieres otro carton";
   1 ;"* Pulsa n si no quieres mas"
   1 ;"* Pulsa c para copiarlo en la     impresora";
   1 ;"* PARA ACABAR INTRODUCE UN -0-    CUANDO TE PIDA EL NUMERO AL     QUE APUESTAS"
   1 ;"";f$;"""";
   1 ;"""P""..DESCUBRE JUEGO";
   1 ;"!!ESTE JUEGO ESTA CHUPADO!!"
   1 ;"!! ME DOBLO !!":
   1 ;" QUIERES EL MISMO JUEGO (S/N)"
   1 ;" 15 MDS"
   1 ;" !!HABER SI APRENDEIS!!     ":
   1 ;"   ?EL MISMO JUEGO? (S/N)     "
   1 ;"       ";
   1 ;"       "
   1 ;"           ZX FRUITS            ":
   1 ;"           ";
   1 ;"           "
   1 ;"               ";
   1 ;"                  ";
   1 ;"                   ";
   1 ;"                              ":
   1 ;"                              "
   1 7 ENTRADA DE DATOS
   1 6656554645                                              
   1 6 X1=A1;X2=A2;B1=Y1;B2=
   1 59:<59:<59:<959799759<<:99:<9575
   1 5 ?QUIEN TIENE H$ ?
   1 4 ESPERA BORRA FICHA
   1 3 FLASH FICHA ELEGIDA
   1 24 POSICION CORRT H$
   1 23 INVERTIR H$
   1 2228222822244448222844282224444:B 
   1 22 COLO IZQ
   1 21 COLO DER ?
   1 2 fichas ahorcadas
   1 1TOMA COOR A1A2B1B2
   1 19 ATTR DER
   1 18 FLASH JUGADOR
   1 17 ?CERRADO? CIR=1
   1 16 VER SI HE GANADO
   1 14 ?PASO? SI=1
   1 13 MIRA SI ES 66
   1 12 PON 66 EN D$(ORD)
   1 11 ?TENGO ESA FICHA?
   1 );x;". ";n$(x):
   1 )+d$(ord,w,)
   1 )+D$(ORD,W,1
   1 %REVISTA DE SOTWARE VIDEOSPECTRUM N.11
   1 "Rojo o negro? ";i$
   1 "Quieres parar? ";w$:
   1 "Pasa (19-36)/Falta (1-18)? ";j$
   1 "Par o impar? ";m$
   1 "MASTERMIND"
   1 "LANZA LA BOLA ";w$
   1 "Introduce tu nombre";l$
   1 "Introduce tu nombre";b$
   1 "Es correcto?, (s/n)";z$
   1 "Es correcta?, (s/n)";z$
   1 "EDITORIAL"
   1 "Cuanto? ";o4:
   1 "Cuanto? ";o3:
   1 "Cuanto? ";o2:
   1 "Cuanto? ";o1:
   1 "Con cuanto dinero entras al     casino? ";t
   1 "BALONCESTO"
   1 "A que numero apuestas? ";h
   1 "4 EN RAYA"
   1 " ESCRIBA EL NUMERO DEL PROGRAMA  QUE DESEE: ";c
   1  VER SI TIENE H$
   1  SALVADOR"
   1  SALVADOR                
   1  PUNTUACCION 
   1  LA RULETA                       21/2/85                         
   1  ?es doble de poner?
   1  !TRAMPOSO! ESTO NO SE HACE "
   1                                                         B
   1                                                            *** POR PEDRO DURA ***                                      
   1                                                         
   1